<script>on mousedownput the mouseloc into myPlaceput item 1 of myPlace + 40 into horizput item 2 of myPlace + 60 into vertget PopUpMenu("About Scripts & Backflips...",0,vert, horiz)if it = 1 thenclick at the loc of bg btn " about..."end ifend mousedown</script>
<script>on mouseUpglobal cancelpush cdlock screengo to cd id 3032click at the loc of bg btn "list all..."if cancel = true thenpop cdend ifunlock screen with dissolveend mouseUp</script>
</part>
<part>
<id>11</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>331</left>
<top>295</top>
<right>406</right>
<bottom>311</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>Buttons</name>
<script>on mouseUpglobal cancelpush cdlock screengo to cd id 3032click at the loc of bg btn "buttons"if cancel = true thenpop cdend ifunlock screen with dissolveend mouseUp</script>
</part>
<part>
<id>12</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>257</left>
<top>295</top>
<right>330</right>
<bottom>311</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>Scripts</name>
<script>on mouseUpglobal cancelpush cdlock screengo to cd id 3032click at the loc of bg btn "scripts"if cancel = true thenpop cdend ifunlock screen with dissolveend mouseUp</script>
</part>
<part>
<id>13</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>182</left>
<top>295</top>
<right>256</right>
<bottom>311</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>XFCNs</name>
<script>on mouseUpglobal cancelpush cdlock screengo to cd id 3032click at the loc of bg btn "xfcns"if cancel = true thenpop cdend ifunlock screen with dissolveend mouseUp</script>
</part>
<part>
<id>14</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>107</left>
<top>295</top>
<right>181</right>
<bottom>311</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>XCMDs</name>
<script>on mouseUpglobal cancelpush cdlock screengo to cd id 3032click at the loc of bg btn "xcmds"if cancel = true thenpop cdend ifunlock screen with dissolveend mouseUp</script>
</part>
<part>
<id>15</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>48</left>
<top>295</top>
<right>98</right>
<bottom>311</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>BackUp...</name>
<script>on mouseUppush cdlock screengo to cd id 3032click at the loc of bg btn "backup..."pop cdunlock screenend mouseUp</script>
<script>on mouseUpif the optionkey is down thenbeepanswer "I hate these kinds of buttons, they always confuse me. " &¬"You know, the ones that change names and seem like they are " &¬"always backwards. 'Show C' when 'Pascal' is *showing*...ugh! " &¬"I hope everyone forgives me for using one of them." with "We" or "Forgive" or "You, Joe!"exit mouseupend ifif the short name of me = "click here to show Pascal" thenlock screenshow cd fld "pascal code"hide cd fld "c code"set the name of me to "Click here to show C"set the icon of me to "THINK C"unlock screen with dissolveelselock screenhide cd fld "pascal code"show cd fld "c code"set the name of me to "Click here to show Pascal"set the icon of me to "THINK Pascal"unlock screen with dissolveend ifend mouseUp</script>
</part>
<part>
<id>19</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>324</left>
<top>46</top>
<right>342</right>
<bottom>61</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>1400</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>lock</name>
<script>on mouseUpif the icon of me = 1400 then -- lockedplay clickset the icon of me to 1401 -- unlockedset the locktext of cd fld "pascal code" to falseset the locktext of cd fld "c code" to falseelseplay clickset the icon of me to 1400 -- lockedset the locktext of cd fld "c code" to trueset the locktext of cd fld "pascal code" to trueend ifend mouseUp</script>